home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #14 / Monster Media No. 14 (April 1996) (Monster Media, Inc.).ISO / prog_bas / basicos2.zip / READING.BAS < prev    next >
BASIC Source File  |  1996-02-11  |  256b  |  14 lines
  1. 0 rem *
  2. 1 rem *
  3. 2 rem *FILE_READ_FOR_NITROUSBASIC
  4. 3 rem *
  5. 4 rem *
  6. 5 open "data.txt" for input as #1 
  7. 10 for LINE=0 to 100 
  8. 20 input #1 ,A$
  9. 25 if eof (#1 )=1 then goto 100 
  10. 30 print "Line: " ;LINE+1 ;":" ;A$
  11. 40 next LINE
  12. 100 close #1 
  13. 110 end 
  14.